In [2]:
using QuadGK, Plots, Roots, ForwardDiff, Interpolations, LaTeXStrings, Polynomials, PlotlyJS
using SpecialFunctions, LinearAlgebra
xb=10
RR=5
Gamma = 1.22542
masa=100 #100
rho0 = masa/(2 *sqrt(2)*1.22542*pi*RR^3 )*0.1 ### zmienione zostalo o 0.05
G=1
gamma=0.23
delta=4*sqrt(3)*pi*0.23


plotlyjs()
#gr()
function energydensityNH(x0)
return rho0*exp(-x0^2/(2*RR^2))
end
    
function energydensityOS(x0)

if x0<=10        
ret = rho0
        elseif x0>10
ret = 0
end
return ret
end            
            
function Beta0(x0)
#return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * quadgk(x->x^2*rho0*exp(-x^2/(2*RR^2)),0,x0)[1] ) )
#end
#function Beta0(x0)
    
#if x0<=10
#return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * (x0^3)/3*rho0 ) )

        
#    elseif x0>10
#    return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * (10^3)/3*rho0 ) )
        
#    end
#return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * quadgk(x->x^2*energydensityOS(x),0,x0)[1] ) )
    
    #return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * quadgk(x->x^2*rho0*exp(-x^2/(2*RR^2)),0,x0)[1] ) )
return -asin(sqrt(8*pi*G*gamma^2*delta/x0^3 * rho0*(-exp(-x0^2/(2*RR^2))*RR^2*x0 +sqrt(pi/2)*RR^3*erf(x0/(sqrt(2)*RR ))   ) ) )
end

function atan2(xx)
if xx<0
return atan(xx) +pi
    else 
        return atan(xx) 
    end
end




function beta(lam,beta0)
    
return -atan2(1/(1/2*(-3*lam-2*1/tan(beta0)) ))
end


function x(lam, x0)
beta0=Beta0(x0)
return (x0*(4+9*lam^2 + 12*lam*1/tan(beta0) +4*1/(tan(beta0))^2  )^(1/3))/(2^(2/3) * (1+ 1/(tan(beta0))^2 )^(1/3) )
end

function t(lam)
return gamma*sqrt(delta)*lam
end

function lambda(t)
return t/(gamma*sqrt(delta))
end

function szift(lam, x0)
return -x(lam,x0)/(gamma*sqrt(delta))*sin(beta(lam,Beta0(x0)))*cos(beta(lam,Beta0(x0)))
end

#function xprim(lam, x0)
#beta0=Beta0(x0)
#function xx(lam)
#return (x0*(4+9*lam^2 + 12*lam*1/tan(beta0) +4*1/(tan(beta0))^2  )^(1/3))/(2^(2/3) * (1+ 1/(tan(beta0))^2 )^(1/3) )
#end
    
#xp = ForwardDiff.derivative(xx,lam)    
    
#return xp
#end



function xprim(lam, x0)
return x(lam, x0)*cos(beta(lam,Beta0(x0)))*sin(beta(lam,Beta0(x0))) 
end   

#Plots.plot(range(-30,30,length=1000),[lam->x(lam,15),lam->xprim(lam,15)])

function tprim(lam)
return gamma*sqrt(delta)
end

function Beta0prim(x0)
return ForwardDiff.derivative(Beta0,x0)
    end


Plots.plot(range(-100,100,length=1000), lam -> beta(lam, Beta0(10)) )

The WebIO Jupyter extension was not detected. See the WebIO Jupyter integration documentation for more information.

Out[2]:
In [3]:
Beta0(10)
Out[3]:
-0.07528928207329234
In [4]:
Plots.plot(range(0.1,35,length=500),x0->energydensityNH(x0) )
Plots.plot!(range(0.1,35,length=500),x0->energydensityOS(x0) )
Out[4]:
In [5]:
Plots.plot(range(0,15,length=500),x0->Beta0(x0))
Out[5]:
In [6]:
p=Plots.plot()
for x01 in range(0,15,length=60)
Plots.plot!(range(0,50,length=500),l->x(l,x01))
end
display(p)
In [7]:
Plots.plot(range(0,50,length=500),l->x(l,1e-6))

Plots.plot!(range(0,50,length=500),l->x(l,10))

Plots.plot!(range(0,50,length=500),l->x(l,11))
Out[7]:
In [8]:
function fff(lam, x0)
return -1/(1-szift(lam,x0))
end

function derfpox0(lam,x0)

function test(x0)
return fff(lam, x0)
end
return ForwardDiff.derivative(test, x0)
end


function derxpox0(lam, x0)

gamma1=0.23
rr=RR   
x0=x0+im*0  
lam=lam+im*0
rr=RR

ret=(-1 * rr ^ -1 * x0 ^ 2 * ((-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1) ^ (2//3) * ((2x0 + -1 * rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1 * (-1 * (x0 ^ 3 + 9 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * lam ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1)) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 6 * gamma1 * lam * rr * sqrt(pi) * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-(1//2) * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 18 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * lam ^ 2 * rr ^ 2)) ^ (-2//3) * (G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) ^ (-1//2) * (x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) ^ (-1//2) * (-1 * rr * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-(1//2) * rr ^ -2 * x0 ^ 2)) * (6 * pi * G * delta * rho0 * gamma1 ^ 2 * lam ^ 2 + exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * exp((1//4) * rr ^ -2 * x0 ^ 2) + 2 * G * delta * gamma1 * lam * rho0 * x0 * sqrt(pi) * ((x0 ^ 2 + -3 * rr ^ 2) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 16 * pi * G * delta * rho0 * gamma1 ^ 2 * rr ^ 2) + pi * G * delta * gamma1 * lam * rho0 * sqrt(2) * rr ^ 3 * (3 * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + -16 * pi * G * delta * rho0 * gamma1 ^ 2) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * exp(-(5//12) * rr ^ -2 * x0 ^ 2))

return real(ret) 
end  





function derxpox02(lam, x0)
    
function test(x0)
return x(lam, x0)
end
return ForwardDiff.derivative(test, x0)
end  


function derPRAWOpolam(lam, x0)
function test(lam)
return fff(lam,x0)*derxpox0(lam, x0)
end
return ForwardDiff.derivative(test, lam)
end  

function derxpox0polam2(lam, x0)
function test(lam)
return derxpox0(lam, x0)
end
return ForwardDiff.derivative(test, lam)
end


function derxpox0polam(lam, x0)

gamma1=0.23
rr=RR   
x0=x0+im*0  
lam=lam+im*0
rr=RR

ret=(-1 * rr ^ -1 * x0 ^ 2 * ((-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1) ^ (2//3) * ((2x0 + -1 * rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1 * (-1 * (x0 ^ 3 + 9 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * lam ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1)) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 6 * gamma1 * lam * rr * sqrt(pi) * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 18 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * lam ^ 2 * rr ^ 2)) ^ (-2//3) * (G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) ^( -1//2) * (x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^( 3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) ^ (-1//2) * (2 * G * delta * gamma1 * rho0 * x0 * sqrt(pi) * ((x0 ^ 2 + -3 * rr ^ 2) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 16 * pi * G * delta * rho0 * gamma1 ^ 2 * rr ^ 2) + pi * G * delta * gamma1 * rho0 * sqrt(2) * rr ^ 3 * (3 * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + -16 * pi * G * delta * rho0 * gamma1 ^ 2) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + -12 * pi * G * delta * lam * rho0 * rr * gamma1 ^ 2 * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^( 3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2)) * exp(-5//12 * rr ^ -2 * x0 ^ 2) + (2//3) * rr ^ -1 * x0 ^ 2 * ((-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1) ^( 2//3) * ((2x0 + -1 * rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1 * (-1 * (x0 ^ 3 + 9 * G * delta * rho0 * sqrt(2) * pi ^( 3//2) * gamma1 ^ 2 * lam ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1)) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 6 * gamma1 * lam * rr * sqrt(pi) * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 18 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * lam ^ 2 * rr ^ 2)) ^ (-5//3) * (G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) ^ (-1//2) * (2x0 + -1 * rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) ^ -1 * (x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) ^( -1//2 ) * (-1 * rr * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * (6 * pi * G * delta * rho0 * gamma1 ^ 2 * lam ^ 2 + exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 2 * G * delta * gamma1 * lam * rho0 * x0 * sqrt(pi) * ((x0 ^ 2 + -3 * rr ^ 2) * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + 16 * pi * G * delta * rho0 * gamma1 ^ 2 * rr ^ 2) + pi * G * delta * gamma1 * lam * rho0 * sqrt(2) * rr ^ 3 * (3 * exp((1 / 2) * rr ^ -2 * x0 ^ 2) + -16 * pi * G * delta * rho0 * gamma1 ^ 2) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * (6 * gamma1 * rr * sqrt(pi) * sqrt(G * delta * rho0 * (-2x0 + rr * sqrt(2) * sqrt(pi) * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2))) * sqrt(x0 ^ 3 + -4 * G * delta * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) + 8 * pi * G * delta * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 * exp(-1//2 * rr ^ -2 * x0 ^ 2)) * exp(1//4 * rr ^ -2 * x0 ^ 2) + 36 * pi * G * delta * lam * rho0 * x0 * gamma1 ^ 2 * rr ^ 2 + -18 * G * delta * lam * rho0 * sqrt(2) * pi ^ (3//2) * gamma1 ^ 2 * rr ^ 3 * erf((1 / 2) * x0 * sqrt(2) * rr ^ -1) * exp((1 / 2) * rr ^ -2 * x0 ^ 2)) * exp(-5//12 * rr ^ -2 * x0 ^ 2))
return real(ret)    
end





@time [derxpox0polam(-10, 1), derxpox0polam2(-10, 1)]
  0.639716 seconds (585.37 k allocations: 39.616 MiB, 2.17% gc time, 99.42% compilation time)
Out[8]:
2-element Vector{Float64}:
 -0.08809252812928256
 -0.08809252812928142
In [9]:
using DifferentialEquations
xpoczU=7.5


function rozwiazanie(s1,lamstar)

if s1<0    
    
function calyproblem(du, u, p, s)
du[1] = -derxpox0(u[1], u[2])
du[2] = -gamma*sqrt(delta)
du[3] = u[3]*derxpox0polam(u[1], u[2])
end


        
        
u0 = [lamstar; xpoczU; -1/(1-szift(lamstar,xpoczU))]

sspan=(0,-s1 ) 

prob3 = ODEProblem(calyproblem, u0, sspan, abstol = 1e-4, reltol = 1e-4)
sol3 = solve(prob3)

return sol3(-s1)
        
    elseif s1>=0        
        
function calyproblem2(du, u, p, s)
du[1] = derxpox0(u[1], u[2])
du[2] = gamma*sqrt(delta)
du[3] = -u[3]*derxpox0polam(u[1], u[2])
end

u02 = [lamstar; xpoczU; -1/(1-szift(lamstar,xpoczU))]

sspan2=(0,s1 ) # 0 20

prob32 = ODEProblem(calyproblem2, u02, sspan2, abstol = 1e-4, reltol = 1e-4)
sol32 = solve(prob32)

return sol32(s1)        
        
end
end

#i1=-40
#Plots.plot( s-> rozwiazanie(s,i1)[2], s->rozwiazanie(s,i1)[1], range(-20,10,length=500) )

#@time rozwiazanie(10,10)

i1=5
@time Plots.plot( s-> rozwiazanie(s,i1)[2], s->rozwiazanie(s,i1)[1], range(-15,35,length=500) )
 24.179622 seconds (259.65 M allocations: 7.408 GiB, 7.03% gc time, 27.62% compilation time: 7% of which was recompilation)
Out[9]:
In [10]:
rozwiazanie(25,30)[2]
Out[10]:
20.36521381418836
In [11]:
function lambda1(s,lamstar)
return rozwiazanie(s,lamstar)[1]
end

function sodx0(x0)
return (x0-xpoczU)/(gamma*sqrt(delta))
end

function lamstar1(x0, lambda)
    
s=sodx0(x0)    
tab1=range(-450,450,length=1000)
tab2=lambda1.(s,tab1)

itp=linear_interpolation(tab2,tab1)

return itp(lambda)
end



function lamstar2(x0, lambda)
    
s=sodx0(x0)    

function test(l)    
return lambda1(s,l)-lambda
end     

ret=find_zero(test,(-450,450))

return ret
end  


function Ffinal(lam, x0)    
ret = rozwiazanie(sodx0(x0),lamstar2(x0,lam))[3]
return ret
                     
end


#@time Ffinal(1,1)
Out[11]:
Ffinal (generic function with 1 method)
In [12]:
#Plots.plot(range(-30,30,length=500), l->lamstar2(1e-6,l))
In [13]:
function derFpox0(lam,x0)

function test(x0)
return Ffinal(lam, x0)
end
return ForwardDiff.derivative(test, x0)
end


function derFpox02(lam,x0)

function test(x0)
return Ffinal(lam, x0)
end
    
dx0=1e-6
    
return (test(x0+dx0)-test(x0))/dx0
end



function derF_PRAWOpolam(lam, x0)
    
    
function test(lam)
return Ffinal(lam,x0)*derxpox0(lam, x0)
end
    
dlam=1e-6
    
return (test(lam+dlam)-test(lam))/dlam
end 



#lam1=15
#@time Plots.plot(range(0.1,15,length=500), x0-> gamma*sqrt(delta)*derFpox02(lam1,x0)+derF_PRAWOpolam(lam1, x0), ylims=(-10,10))
Out[13]:
derF_PRAWOpolam (generic function with 1 method)
In [14]:
function Fslam(s,lamstar)
return rozwiazanie(s,lamstar)[3]
end


function FslamS(lamstar)
return -1/(1-szift(lamstar,xpoczU))
end




function intelamstarU(lamstar)
s=0    
return FslamS(lamstar)*(-1)*gamma*sqrt(delta)
end


function oneoverintelamstarU(lamstar)
return 1/intelamstarU(lamstar)
end




function bisection(f, a, b, tol)
    
    if sign(f(a)) == sign(f(b))
        error("function has the same sign at given endpoints")
    end

    mid = (a + b)/2

    while abs(f(mid)) > tol

        sign(f(mid)) == sign(f(a)) ? a=mid : b=mid
            
        mid = (a + b)/2

    end

    return mid
    
end



lamstar_zero1 = bisection(oneoverintelamstarU, -30, -10, 1e-14)
lamstar_zero2 = bisection(oneoverintelamstarU, -10, 30, 1e-12)

#Plots.plot(range(20,30,length=500), lamstar -> intelamstarU(lamstar) )


function calklamstarU(lamstar1)

    if lamstar_zero1<lamstar1<lamstar_zero2

    calk=quadgk(lamstar->intelamstarU(lamstar),0,lamstar1)[1]
        
   elseif lamstar1<lamstar_zero1
    
    calk=(quadgk(lamstar->intelamstarU(lamstar),0,lamstar_zero1+1e-7)[1] +
        quadgk(lamstar->intelamstarU(lamstar),lamstar_zero1-1e-7,lamstar1)[1] )
    
        
    elseif lamstar_zero2<lamstar1
    
    calk=(quadgk(lamstar->intelamstarU(lamstar),0,lamstar_zero2-1e-9)[1] +
        quadgk(lamstar->intelamstarU(lamstar),lamstar_zero2+1e-9,lamstar1)[1]  )
        
    end   
return calk
end

function ufinalSlam(lamstar)
return 0+ calklamstarU(lamstar) #calkUslam(s,lamstar) + calklamstarU(lamstar)
end


function ufinalin(l, x0)
return 0+ calklamstarU(lamstar2(x0,l)) #calkUslam(s,lamstar) + calklamstarU(lamstar)
end


#Plots.plot(range(-30,30, length=500), lamstar->ufinalSlam(lamstar) )

#@time ufinalin(50, 10)
#lamstar2(1,1)

@time Plots.plot(range(-30,30, length=500), lamstar->ufinalSlam(lamstar) )
  5.753469 seconds (69.21 M allocations: 1.272 GiB, 4.26% gc time, 50.77% compilation time: <1% of which was recompilation)
Out[14]:
In [15]:
@time Plots.plot(range(-30,30, length=150), lamstar-> oneoverintelamstarU(lamstar) )
  0.069498 seconds (53.08 k allocations: 2.814 MiB, 97.66% compilation time)
Out[15]:
In [16]:
xpoczV=15
function rozwiazanieV(s1,lamstar)

if s1<0    
    
function calyproblem(du, u, p, s)
du[1] = -derxpox0(u[1], u[2])
du[2] = gamma*sqrt(delta)
du[3] = u[3]*derxpox0polam(u[1], u[2])
end

u0 = [lamstar; xpoczV; 1/(1+szift(lamstar,xpoczV))]

sspan=(0,-s1 ) 

prob3 = ODEProblem(calyproblem, u0, sspan, abstol = 1e-4, reltol = 1e-4)
sol3 = solve(prob3)

return sol3(-s1)
        
    elseif s1>=0        
        
function calyproblem2(du, u, p, s)
du[1] = derxpox0(u[1], u[2])
du[2] = -gamma*sqrt(delta)
du[3] = -u[3]*derxpox0polam(u[1], u[2])
end

u02 = [lamstar; xpoczV; 1/(1+szift(lamstar,xpoczV))]

sspan2=(0,s1) 

prob32 = ODEProblem(calyproblem2, u02, sspan2, abstol = 1e-4, reltol = 1e-4)
sol32 = solve(prob32)

return sol32(s1)        
        
end
end


plotlyjs()
pv=Plots.plot()
for i1 in range(-30,30,length=10)

    
@time Plots.plot!( s-> rozwiazanieV(s,i1)[2], s->rozwiazanieV(s,i1)[1], range(-35,29.5,length=150) )
end

display(pv)
  1.263062 seconds (10.26 M allocations: 304.893 MiB, 5.15% gc time, 39.60% compilation time: <1% of which was recompilation)
  0.714682 seconds (9.86 M allocations: 271.030 MiB, 3.82% gc time)
  0.755356 seconds (10.47 M allocations: 287.367 MiB, 3.91% gc time)
  0.904169 seconds (12.67 M allocations: 346.788 MiB, 3.24% gc time)
  1.303921 seconds (18.20 M allocations: 495.903 MiB, 3.98% gc time)
  1.913248 seconds (26.62 M allocations: 723.899 MiB, 3.88% gc time)
  2.651637 seconds (36.22 M allocations: 984.162 MiB, 3.39% gc time)
  2.354141 seconds (31.47 M allocations: 855.940 MiB, 3.81% gc time)
  0.768189 seconds (10.34 M allocations: 284.021 MiB, 3.81% gc time)
  0.751630 seconds (9.89 M allocations: 271.932 MiB, 2.64% gc time)
In [17]:
function lambda1V(s,lamstar)
return rozwiazanieV(s,lamstar)[1]
end

function sodx0V(x0)
return (xpoczV-x0)/(gamma*sqrt(delta))
end


function lamstar1V(x0, lambda)
    
s=sodx0V(x0)    
tab1=range(-550,950,length=1000)
tab2=lambda1V.(s,tab1)

itp=linear_interpolation(tab2,tab1)

return itp(lambda)
end


function lamstar2V(x0, lambda)
    
s=sodx0V(x0)    

function test(l)    
return lambda1V(s,l)-lambda
end     

ret=find_zero(test,(-1150,950))

return ret
end

#lamstar1(1,lambda1(-5,21))

#x001=0.05
#lamstar1V(x001,lambda1(sodx0(x001),100))

function FfinalV(lam, x0)
    
if x0<10    
    
ret = rozwiazanieV(sodx0V(x0),lamstar2V(x0,lam))[3]
return ret
        
        
    elseif x0>=10        
return 1/(1+szift(lam,x0)) 
            
end 
        
        
end
Out[17]:
FfinalV (generic function with 1 method)
In [18]:
function derFpox0V(lam,x0)

function test(x0)
return FfinalV(lam, x0)
end
return ForwardDiff.derivative(test, x0)
end


function derFpox02V(lam,x0)

function test(x0)
return FfinalV(lam, x0)
end
    
dx0=1e-6
    
return (test(x0+dx0)-test(x0))/dx0
end



function derF_PRAWOpolamV(lam, x0)
    
    
function test(lam)
return FfinalV(lam,x0)*derxpox0(lam, x0)
end
    
dlam=1e-6
    
return (test(lam+dlam)-test(lam))/dlam
end
Out[18]:
derF_PRAWOpolamV (generic function with 1 method)
In [19]:
lam1=5
#@time Plots.plot(range(0.1,40,length=500), x0-> -gamma*sqrt(delta)*derFpox02V(lam1,x0)+derF_PRAWOpolamV(lam1, x0),
#    ylims=(-10,10))
Out[19]:
5
In [20]:
function FslamV(s,lamstar)
return rozwiazanieV(s,lamstar)[3]
end

function FslamSV(lamstar)
return 1/(1+szift(lamstar,xpoczV))
end


function intelamstarV(lamstar)
s=0    
return FslamSV(lamstar)*gamma*sqrt(delta)
end


function oneoverintelamstarV(lamstar)
return 1/intelamstarV(lamstar)
end

#Plots.plot(range(-20,30,length=500), lamstar -> oneoverintelamstarV(lamstar))


Vlamstar_zero1 = bisection(oneoverintelamstarV, 10, 40, 1e-12)
Vlamstar_zero2 = bisection(oneoverintelamstarV, 40, 90, 1e-12)




function calklamstarV(lamstar1)

    if lamstar1<Vlamstar_zero1

    calk=quadgk(lamstar->intelamstarV(lamstar),0,lamstar1)[1]
        
    elseif Vlamstar_zero1<lamstar1<Vlamstar_zero2
    
    calk=(quadgk(lamstar->intelamstarV(lamstar),0,Vlamstar_zero1-1e-9)[1] +
        quadgk(lamstar->intelamstarV(lamstar),Vlamstar_zero1+1e-9,lamstar1)[1] )
    
        
    elseif Vlamstar_zero2<lamstar1
    
    calk=(quadgk(lamstar->intelamstarV(lamstar),0,Vlamstar_zero1-1e-9)[1] +
        quadgk(lamstar->intelamstarV(lamstar),Vlamstar_zero1+1e-9,Vlamstar_zero2-1e-7)[1] 
        +quadgk(lamstar->intelamstarV(lamstar),Vlamstar_zero2+1e-7,lamstar1)[1]  )
        
   end   
return calk
end





function vfinalSlam(lamstar)
return 0+ calklamstarV(lamstar) #calkUslam(s,lamstar) + calklamstarU(lamstar)
end

function vfinalin(l, x0)
return 0+ calklamstarV(lamstar2V(x0,l)) #calkUslam(s,lamstar) + calklamstarU(lamstar)
end



#@time Plots.plot(range(-40,40,length=500), l->vfinalin(l, 10) )

Plots.plot(range(-30,40,length=500) ,lamstar->oneoverintelamstarV(lamstar))
Out[20]:
In [21]:
#Plots.plot(range(-130,130,length=500) ,lamstar->vfinalSlam(lamstar))

Plots.plot(range(-30,40,length=500) ,lamstar->oneoverintelamstarV(lamstar))
Out[21]:
In [22]:
Ax0=5
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)

vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)

[ulamsin1,ulamsin2,vlamsin1,vlamsin2]
Out[22]:
4-element Vector{Float64}:
 -19.368613583731804
   3.9370764793202913
   6.764536675304572
  70.8751797781234
In [23]:
############### SHELL CROSSING SIN

#using SymPy
#const sympy_parsing_mathematica = SymPy.PyCall.pyimport("sympy.parsing.mathematica")
function delta0(x0)
Mdelta=delta
Mgamma=gamma
Mrho=rho0
G=1
ret=(1//5 * G * Mdelta * Mrho * sqrt(pi) * Mgamma ^ 2 * x0 ^ -4 * (G * Mdelta * Mrho * Mgamma ^ 2 * x0 ^ -3 * (-2 * x0 * exp(-1//50 * x0 ^ 2) + 5 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)))) ^ (-1//2) * (1 + 100 * pi * G * Mdelta * Mrho * Mgamma ^ 2 * x0 ^ -3 * (2 * x0 * exp(-1//50 * x0 ^ 2) + -5 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)))) ^( -1//2) * (-2 * x0 * (75 + x0 ^ 2) + 375 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)) * exp(1//50 * x0 ^ 2)) * exp(-1//50 * x0 ^ 2))
return ret
end



#s = "(1080000000*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^2*Mrho0^2*Pi^(10/3)*x0^4*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 607500000*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^4*Mrho0^2*Pi^(10/3)*x0^4*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 8100000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(7/3)*x0^6*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 3000*E^((3*x0^2)/50)*Pi^(4/3)*x0^8*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 5400000000*Sqrt[2]*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^2*Mrho0^2*Pi^(23/6)*x0^3*Erf[x0/(5*Sqrt[2])]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 3037500000*Sqrt[2]*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^4*Mrho0^2*Pi^(23/6)*x0^3*Erf[x0/(5*Sqrt[2])]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 20250000*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(17/6)*x0^5*Erf[x0/(5*Sqrt[2])]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 13500000000*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^2*Mrho0^2*Pi^(13/3)*x0^2*Erf[x0/(5*Sqrt[2])]^2*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 7593750000*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^4*Mrho0^2*Pi^(13/3)*x0^2*Erf[x0/(5*Sqrt[2])]^2*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) - 81000000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^3*Mrho0*Pi^(17/6)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 180000*E^((3*x0^2)/50)*Mlam*Pi^(11/6)*x0^8*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3) + 202500000*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^3*Mrho0*Pi^(10/3)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/((-144000000*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (81000000*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^4*Mrho0*Pi^(3/2)*x0^4*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (1080000*2^(5/6)*E^(x0^2/25)*Mlam^2*Sqrt[Pi]*x0^6*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (400*2^(5/6)*E^((3*x0^2)/50)*x0^8*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/(G*Mdelta*Mgamma^2*Mrho0*Sqrt[Pi]*(E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (1440000000*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (810000000*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^4*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (5400000*2^(1/3)*E^((3*x0^2)/50)*Mlam^2*Pi*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (1800000000*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*x0^2*Erf[x0/(5*Sqrt[2])]^2*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (1012500000*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^4*Mrho0*Pi^(5/2)*x0^2*Erf[x0/(5*Sqrt[2])]^2*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) + (10800000*2^(5/6)*E^(x0^2/25)*Mlam^3*Pi*x0^6*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (24000*2^(5/6)*E^((3*x0^2)/50)*Mlam*x0^8*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/(G*Mdelta*Mgamma^2*Mrho0*(E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (54000000*2^(1/3)*E^((3*x0^2)/50)*Mlam^3*Pi^(3/2)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^(1/3)*(-60*2^(1/3)*G*Mdelta*Mgamma^2*Mrho0*Pi^(4/3)*x0^3*(E^(x0^2/50)*x0^3)^(1/3)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 450*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(11/6)*x0^2*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) - 2250*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^(7/3)*x0*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^2*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + 1875*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(17/6)*(E^(x0^2/50)*x0^3)^(1/3)*Erf[x0/(5*Sqrt[2])]^3*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3) + (4*2^(1/6)*E^(x0^2/50)*Pi^(4/3)*x0^6*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) - (20*2^(2/3)*E^(x0^2/25)*Pi^(11/6)*x0^5*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]) + (50*2^(1/6)*E^((3*x0^2)/50)*Pi^(7/3)*x0^4*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*((E^(x0^2/50)*x0^3*(2*x0^2 - 10*E^(x0^2/50)*Sqrt[2*Pi]*x0*Erf[x0/(5*Sqrt[2])] + 25*E^(x0^2/25)*Pi*Erf[x0/(5*Sqrt[2])]^2))/(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)*(-((Sqrt[-((E^(x0^2/50)*x0^3)/(-200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 - E^(x0^2/50)*x0^3 + 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]))]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*(-400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^3 - 2*E^(x0^2/50)*x0^5 + 3000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] + 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 15000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 - 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 12500*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/((200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)))^(8/3)*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3]*Sqrt[1 - (8*G*Mdelta*Mgamma^2*Mrho0*Pi*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^3])))/((E^(x0^2/50)*x0^3)^(1/3)*(-4*x0^3 + 30*E^(x0^2/50)*Sqrt[2*Pi]*x0^2*Erf[x0/(5*Sqrt[2])] - 150*E^(x0^2/25)*Pi*x0*Erf[x0/(5*Sqrt[2])]^2 + 125*Sqrt[2]*E^((3*x0^2)/50)*Pi^(3/2)*Erf[x0/(5*Sqrt[2])]^3)*((G*Mdelta*Mgamma^2*Mrho0)/(E^(x0^2/50)*x0) - (3*G*Mdelta*Mgamma^2*Mrho0*((-25*x0)/E^(x0^2/50) + 125*Sqrt[Pi/2]*Erf[x0/(5*Sqrt[2])]))/x0^4)) - (24000*2^(1/3)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(4/3)*x0^3*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 + (180000*2^(5/6)*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(11/6)*x0^2*Erf[x0/(5*Sqrt[2])]*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 - (900000*2^(1/3)*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(7/3)*x0*Erf[x0/(5*Sqrt[2])]^2*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 + (750000*2^(5/6)*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(17/6)*Erf[x0/(5*Sqrt[2])]^3*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 - (800*2^(1/3)*E^(x0^2/50)*Pi^(5/6)*x0^5*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 + (4000*2^(5/6)*E^(x0^2/25)*Pi^(4/3)*x0^4*Erf[x0/(5*Sqrt[2])]*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2 - (10000*2^(1/3)*E^((3*x0^2)/50)*Pi^(11/6)*x0^3*Erf[x0/(5*Sqrt[2])]^2*(-((E^(x0^2/50)*x0^3)/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(2/3)*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]*(-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])^2*(-((-450*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 + 1125*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])] - 30*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^3*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))))^(1/3)*((-900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^3 + 2*E^(x0^2/50)*x0^5 + 6750*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^2*Erf[x0/(5*Sqrt[2])] - 10*E^(x0^2/25)*Sqrt[2*Pi]*x0^4*Erf[x0/(5*Sqrt[2])] - 33750*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0*Erf[x0/(5*Sqrt[2])]^2 + 25*E^((3*x0^2)/50)*Pi*x0^3*Erf[x0/(5*Sqrt[2])]^2 + 28125*Sqrt[2]*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(5/2)*Erf[x0/(5*Sqrt[2])]^3 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 300*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 750*E^((3*x0^2)/50)*Mlam*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)^(1/3)*(-((G*Mdelta*Mgamma^2*Mrho0*(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])*(400*G*Mdelta*Mgamma^2*Mrho0*Pi*x0^2 - 900*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^2 + 2*E^(x0^2/50)*x0^4 - 2000*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] + 4500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0*Erf[x0/(5*Sqrt[2])] - 5*E^(x0^2/25)*Sqrt[2*Pi]*x0^3*Erf[x0/(5*Sqrt[2])] + 5000*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 11250*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*Erf[x0/(5*Sqrt[2])]^2 - 60*E^(x0^2/50)*Mlam*Sqrt[Pi]*x0^4*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 150*Sqrt[2]*E^(x0^2/25)*Mlam*Pi*x0^3*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])*Sqrt[1 + 4/(-3*Mlam + Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]/(5*Sqrt[Pi]*Sqrt[(G*Mdelta*Mgamma^2*Mrho0*((-2*x0)/E^(x0^2/50) + 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3]))^2])/(27000*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(3/2)*x0^3 - 60*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0^5 - 202500*Sqrt[2]*E^(x0^2/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^2*x0^2*Erf[x0/(5*Sqrt[2])] + 300*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*x0^4*Erf[x0/(5*Sqrt[2])] + 1012500*E^(x0^2/25)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^(5/2)*x0*Erf[x0/(5*Sqrt[2])]^2 - 750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi^(3/2)*x0^3*Erf[x0/(5*Sqrt[2])]^2 - 843750*Sqrt[2]*E^((3*x0^2)/50)*G^2*Mdelta^2*Mgamma^4*Mlam^3*Mrho0^2*Pi^3*Erf[x0/(5*Sqrt[2])]^3 - 60*G*Mdelta*Mgamma^2*Mlam*Mrho0*Sqrt[Pi]*x0*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 150*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam*Mrho0*Pi*Erf[x0/(5*Sqrt[2])]*(200*G*Mdelta*Mgamma^2*Mrho0*Pi*x0 + E^(x0^2/50)*x0^3 - 500*Sqrt[2]*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mrho0*Pi^(3/2)*Erf[x0/(5*Sqrt[2])])*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]) + 2700*E^(x0^2/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi*x0^5*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 2*E^(x0^2/25)*x0^7*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] - 13500*Sqrt[2]*E^(x0^2/25)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^(3/2)*x0^4*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 5*E^((3*x0^2)/50)*Sqrt[2*Pi]*x0^6*Erf[x0/(5*Sqrt[2])]*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3] + 33750*E^((3*x0^2)/50)*G*Mdelta*Mgamma^2*Mlam^2*Mrho0*Pi^2*x0^3*Erf[x0/(5*Sqrt[2])]^2*Sqrt[-((G*Mdelta*Mgamma^2*Mrho0*(2*x0 - 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/(E^(x0^2/50)*x0^3))]*Sqrt[1 + (100*G*Mdelta*Mgamma^2*Mrho0*Pi*((2*x0)/E^(x0^2/50) - 5*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])]))/x0^3])))^(8/3))/(-2*x0 + 5*E^(x0^2/50)*Sqrt[2*Pi]*Erf[x0/(5*Sqrt[2])])^2)"
#ex = sympy_parsing_mathematica.mathematica(s,Dict("Erf[x]"=>"erf(x)","Gamma[x]"=>"Gamma(x)") )
#f_expr = SymPy.SymPyCore.walk_expression(Sym(ex))


#Mdelta=4*sqrt(3)*pi*0.23
#G=1
#Mgamma=gamma
#Mrho0=rho0

# :(((x + y) ^ 3) ^ -1//2)
#@generated DELTAfinal(Mlam,x0) = f_expr











############# NUMERYCZNIE 
using DifferentialEquations


#x01=5
#lfin=deninf(5)+0.474


function deltaNUM(l1,x0)

function rowdelta(du, u, p, l)
du[1]=-2*sin(2*beta(l, Beta0(x0)))*u[1]-x(l, x0)*cos(2*beta(l, Beta0(x0)))*u[1]^2
end
u0=[delta0(x0)]
lspan=(0,20 )

prob=ODEProblem(rowdelta,u0, lspan,maxiters=100 )
sol1=solve(prob)

return sol1(l1)[1]
end



function deltaNUM(l1,x0)


    

function rowdelta(du, u, p, l)
du[1]=-2*sin(2*beta(l, Beta0(x0)))*u[1]-x(l, x0)*cos(2*beta(l, Beta0(x0)))*u[1]^2
end
u0=[delta0(x0)]
lspan=(0,160 )



condition(u,t,integrator) = u[1] - 1e9 # Is zero when u[3] = 10
affect!(integrator) = terminate!(integrator)
cb = ContinuousCallback(condition,affect!)    
    

prob=ODEProblem(rowdelta,u0, lspan,callback = cb, reltol=1e-4,abstol=1e-4 )
sol1=solve(prob)

return sol1(l1)[1]
end


function lamshell(x0)

function test(l1)
return deltaNUM(l1,x0)-1e8
end

return find_zero(test,(0,1000) )[1]
end

#deltaNUM(10,5)



function lamshell2(x0)
Mdelta=delta
Mrho0=rho0
G=1
Mgamma=gamma
ret = (1//15 * pi ^ (-1//2) * (-1 * G * Mdelta * Mrho0 * Mgamma ^ 2 * x0 ^ -3 * (2x0 + -5 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)) * exp(1//50 * x0 ^ 2)) * exp(-1//50 * x0 ^ 2)) ^ (-1//2) * sqrt(1 + 100 * pi * G * Mdelta * Mrho0 * Mgamma ^ 2 * x0 ^ -3 * (2 * x0 * exp(-1//50 * x0 ^ 2) + -5 * sqrt(2) * sqrt(pi) * erf(1//10 * x0 * sqrt(2)))))
return ret
end




function density(l,x0)
ret = 3*sin(beta(l,Beta0(x0)))^2/(8*pi*G*gamma^2*delta) + x(l,x0)*cos(beta(l,Beta0(x0)))*sin(beta(l,Beta0(x0)))*deltaNUM(l,x0)/(4*pi*G*gamma^2*delta)
return ret
end
#lamshell(24.5)
#lamshell(15)
@time Plots.plot( range(5,20,length=150), x0->lamshell(x0) )
 35.761424 seconds (612.66 M allocations: 11.032 GiB, 3.66% gc time, 12.00% compilation time)
Out[23]:
In [24]:
x01=5
x02=10

Plots.plot( range(0,30,length=500), l->deltaNUM(l,x01) )

Plots.plot!( range(0,50,length=500), l->deltaNUM(l,x02) )


Plots.scatter!( [lamshell(x01)], [deltaNUM(lamshell(x01),x01)], ylims=(0,1e9) )

Plots.scatter!( [lamshell(x02)], [deltaNUM(lamshell(x02),x02)], ylims=(0,1e9) )




#Plots.scatter!( [lamshell2(x01)], [deltaNUM(lamshell2(x01),x01)] )

#Plots.scatter!( [lamshell2(x02)], [deltaNUM(lamshell2(x02),x02)] )
Out[24]:
In [25]:
p=Plots.plot()
for x01 in range(1,15,length=50)
Plots.plot!(range(0,20,length=500),l->x(l,x01))
end

Plots.plot!( x0->lamshell(x0),x0->x(lamshell(x0),x0), range(5,15,length=50), color=:red )
display(p)
In [26]:
function minusNzeros(x0)
function test(lam)
return 1-szift(lam, x0)
    end
    
    
lamtab1=range(-100,200,length=2000)
appalamtab=[]
    for i1 in lamtab1
    push!(appalamtab, test(i1))
end

miejsce=lamtab1[findmin(appalamtab)[2]]
    
    
return find_zeros(test, (miejsce-150,miejsce+150))
end

function plusNzeros(x0)
function test(lam)
return 1+szift(lam, x0)
    end
    
    
lamtab1=range(-100,200,length=2000)
appalamtab=[]
    for i1 in lamtab1
    push!(appalamtab, test(i1))
end

miejsce=lamtab1[findmin(appalamtab)[2]]
    
    
return find_zeros(test, (miejsce-150,miejsce+450))
end


minusNzeros(7.5)
Out[26]:
2-element Vector{Float64}:
 -10.73159370353197
   6.884084906913793
In [27]:
function minusNzeros(x0)
function test(lam)
return 1-szift(lam, x0)
    end
    


    
    
return find_zeros(test, (-50,100))
end

function plusNzeros(x0)
function test(lam)
return 1+szift(lam, x0)
    end
    

    
    
return find_zeros(test, (-50,100))
end

st=3.06670

minusNzeros(st)
Out[27]:
2-element Vector{Float64}:
 4.265568799571835
 4.383291411784029
In [28]:
tabx01=range(st,20, length=550)



tablam1=[]
for i1 in 1:length(tabx01)
    
laa=minusNzeros(tabx01[i1])[1]
push!(tablam1,laa )
end


tabx02=range(st,20, length=550)

tablam2=[]
for i1 in 1:length(tabx02)
    
laa=minusNzeros(tabx02[i1])[2]
push!(tablam2,laa )
end


tabx03=range(st,20, length=550)

tablam3=[]
for i1 in 1:length(tabx03)
    
laa=plusNzeros(tabx03[i1])[1]
push!(tablam3,laa )
end


tabx04=range(st,20, length=550)

tablam4=[]
for i1 in 1:length(tabx04)
    
laa=plusNzeros(tabx04[i1])[2]
push!(tablam4,laa )
end

minusNzeros(15)
Out[28]:
2-element Vector{Float64}:
 -22.166890512026313
  14.002179739642441
In [29]:
minusNzeros(st)
Out[29]:
2-element Vector{Float64}:
 4.265568799571835
 4.383291411784029
In [30]:
Plots.plot(range(-30,30,length=500), l->1-szift(l,20))
Out[30]:
In [31]:
function lamsin1(x0)
ulamsin1=lambda1(sodx0(x0) ,lamstar_zero1)
return ulamsin1
end

function lamsin2(x0)
ulamsin2=lambda1(sodx0(x0) ,lamstar_zero2)
return ulamsin2
end

function lamsin3(x0)
vlamsin1=lambda1V(sodx0V(x0) ,Vlamstar_zero1)
return vlamsin1
end

function lamsin4(x0)
vlamsin2=lambda1V(sodx0V(x0) ,Vlamstar_zero2)
return vlamsin2
end

minusNzeros(40)
Out[31]:
2-element Vector{Float64}:
 23.478510477650012
 60.74800822420994
In [32]:
plotlyjs()

#pv
Plots.plot(range(0.1,25,length=500), x0->lamsin1(x0), linewidth=2)
Plots.plot!(range(0.1,25,length=500), x0->lamsin2(x0), linewidth=2)
Plots.plot!(range(0.1,25,length=500), x0->lamsin3(x0), linewidth=2)
Plots.plot!(range(0.1,25,length=500), x0->lamsin4(x0), linewidth=2)

Plots.plot!(range(st,25,length=500), x0->minusNzeros(x0)[1], color=:black)
Plots.plot!(range(st,25,length=500), x0->minusNzeros(x0)[2], color=:black)
Plots.plot!(range(st,25,length=500), x0->plusNzeros(x0)[1], color=:black)
Plots.plot!(range(st,25,length=500), x0->plusNzeros(x0)[2], color=:black)


Plots.plot!( range(4.895,25,length=150), x0->lamshell(x0), color=:red)
Out[32]:
In [33]:
function teest(x0)
return lamsin2(x0) - minusNzeros(x0)[1]
end

przec1=find_zeros(teest,(3.5,5))[1]

function teest2(x0)
return lamsin3(x0) - plusNzeros(x0)[2]
end

przec2=find_zeros(teest2,(st,4))[1]
Out[33]:
3.201083039489556
In [34]:
[xpoczU,przec1,st]
Out[34]:
3-element Vector{Float64}:
 7.5
 3.7824112690492
 3.0667
In [35]:
kap=1/5

function APPatanufinal1M1(x0)
lam=minusNzeros(x0)[1]
return 1/pi*atan(kap*ufinalin(lam,x0))
end


function APPatanvfinal1M1(x0)
lam=minusNzeros(x0)[1] 
return 1/pi*atan(kap*vfinalin(lam,x0))
end

    function APPatanufinal2M1(x0)
    lam=minusNzeros(x0)[1] 
    return -1/pi*atan(kap*ufinalin(lam,x0))+1
    end


            function APPatanufinal3M1(x0)
            lam=minusNzeros(x0)[1] 
            return 1/pi*atan(kap*ufinalin(lam,x0))+2
            end



            
                    
                    function APPatanvfinal1M2(x0)
                    lam=minusNzeros(x0)[2]
                    return 1/pi*atan(kap*vfinalin(lam,x0))
                    end

                    function APPatanufinal3M2(x0)
                    lam=minusNzeros(x0)[2] 
                    return 1/pi*atan(kap*ufinalin(lam,x0))+2
                    end




                            function APPatanufinal2M2(x0)
                            lam=minusNzeros(x0)[2] 
                            return -1/pi*atan(kap*ufinalin(lam,x0))+1
                            end


### DOLNY HORYZONT

#Plots.plot(x0->APPatanvfinal1M1(x0)-APPatanufinal1M1(x0), x0->APPatanvfinal1M1(x0)+APPatanufinal1M1(x0), range(xpoczU+1e-7,15,length=50) )
#Plots.plot!(x0->APPatanvfinal1M1(x0)-APPatanufinal2M1(x0), x0->APPatanvfinal1M1(x0)+APPatanufinal2M1(x0), range(przec1+1e-7,xpoczU-1e-7,length=50) )
#Plots.plot!(x0->APPatanvfinal1M1(x0)-APPatanufinal3M1(x0), x0->APPatanvfinal1M1(x0)+APPatanufinal3M1(x0), range(st,przec1-1e-7,length=50) )


#Plots.plot!(x0->APPatanvfinal1M2(x0)-APPatanufinal3M2(x0), x0->APPatanvfinal1M2(x0)+APPatanufinal3M2(x0), range(st,xpoczU-1e-7,length=50) )
#Plots.plot!(x0->APPatanvfinal1M2(x0)-APPatanufinal2M2(x0), x0->APPatanvfinal1M2(x0)+APPatanufinal2M2(x0), range(xpoczU+1e-7,15,length=50) )
Out[35]:
APPatanufinal2M2 (generic function with 1 method)
In [36]:
#### PRECOMPUTING APPARENT DOLNY


t1ap= range(xpoczU+1e-7,15,length=50)
t2ap= range(przec1+1e-7,xpoczU-1e-7,length=50)
t3ap= range(st,przec1-1e-7,length=50)
t4ap= range(st,xpoczU-1e-7,length=50)
t5ap= range(xpoczU+1e-7,15,length=50)

vap1= APPatanvfinal1M1.(t1ap)
vap2= APPatanvfinal1M1.(t2ap)
vap3= APPatanvfinal1M1.(t3ap)
vap4= APPatanvfinal1M2.(t4ap)
vap5= APPatanvfinal1M2.(t5ap)

tapA=vcat(t3ap,t2ap,t1ap)
vapA=vcat(vap3,vap2,vap1)

tapB=vcat(t4ap,t5ap)
vapB=vcat(vap4,vap5)

vdolnyA = linear_interpolation(tapA,vapA)
vdolnyB = linear_interpolation(tapB,vapB)


uap1=APPatanufinal1M1.(t1ap)
uap2=APPatanufinal2M1.(t2ap)
uap3=APPatanufinal3M1.(t3ap)
uap4=APPatanufinal3M2.(t4ap)
uap5=APPatanufinal2M2.(t5ap)

uapA=vcat(uap3,uap2,uap1)
uapB=vcat(uap4,uap5)

udolnyA=linear_interpolation(tapA,uapA);
udolnyB = linear_interpolation(tapB,uapB);
In [37]:
Plots.plot(l->vdolnyA(l)-udolnyA(l),l->vdolnyA(l)+udolnyA(l) , tapA, aspectratio=1, color=:magenta )

l1=first(tapA)
l2=first(tapB)

Plots.plot!([vdolnyA(l1)-udolnyA(l1),vdolnyB(l2)-udolnyB(l2) ] ,[vdolnyA(l1)+udolnyA(l1),vdolnyB(l2)+udolnyB(l2)] , aspectratio=1, color=:magenta )

Plots.plot!(l->vdolnyB(l)-udolnyB(l),l->vdolnyB(l)+udolnyB(l) , tapB, aspectratio=1, color=:magenta )
Out[37]:
In [38]:
######## GORNY HORYZONT


function APPatanufinal3P1(x0)
lam=plusNzeros(x0)[1] 
return 1/pi*atan(kap*ufinalin(lam,x0))+2
end

function APPatanvfinal1P1(x0)
lam=plusNzeros(x0)[1] 
return 1/pi*atan(kap*vfinalin(lam,x0))
end

            function APPatanufinal3P2(x0)
            lam=plusNzeros(x0)[2]
            return 1/pi*atan(kap*ufinalin(lam,x0))+2
            end

            function APPatanvfinal1P2(x0)
            lam=plusNzeros(x0)[2] 
            return 1/pi*atan(kap*vfinalin(lam,x0))
                end


               
                function APPatanvfinal2P2(x0)
                lam=plusNzeros(x0)[2] 
                return -1/pi*atan(kap*vfinalin(lam,x0))+1
                end



#Plots.plot!(x0->APPatanvfinal1P1(x0)-APPatanufinal3P1(x0), x0->APPatanvfinal1P1(x0)+APPatanufinal3P1(x0), range(st,15,length=50) )
#Plots.plot!(x0->APPatanvfinal1P2(x0)-APPatanufinal3P2(x0), x0->APPatanvfinal1P2(x0)+APPatanufinal3P2(x0), range(st,przec2-1e-7,length=50) )
#Plots.plot!(x0->APPatanvfinal2P2(x0)-APPatanufinal3P2(x0), x0->APPatanvfinal2P2(x0)+APPatanufinal3P2(x0), range(przec2+1e-7,15,length=50) )
Out[38]:
APPatanvfinal2P2 (generic function with 1 method)
In [39]:
### PRE COMPUTING SHELL CROSSING


            function SHELLatanufinal3(x0)
            lam=lamshell(x0)
            return 1/pi*atan(kap*ufinalin(lam,x0))+2
            end


            function SHELLatanvfinal1(x0)
            lam=lamshell(x0)
            return 1/pi*atan(kap*vfinalin(lam,x0))
            end
#4.895

x0tab=range(4.895,15,length=150)
shellu=SHELLatanufinal3.(x0tab)
shellv=SHELLatanvfinal1.(x0tab)

SHELLu3 = linear_interpolation(x0tab, shellu)
SHELLv1 = linear_interpolation(x0tab, shellv)

Plots.plot(x0->SHELLv1(x0)-SHELLu3(x0), x0->SHELLv1(x0) + SHELLu3(x0),  x0tab  )


#Plots.plot(x0->SHELLatanvfinal1(x0)-SHELLatanufinal3(x0), x0->SHELLatanvfinal1(x0)+SHELLatanufinal3(x0), range(4.9,15,length=50), color=:violet )
Out[39]:
In [40]:
Plots.plot(x0tab,  x0->ufinalin(lamshell(x0),x0))
Plots.plot!(x0tab,  x0->vfinalin(lamshell(x0),x0))
Out[40]:
In [41]:
Plots.plot( range(4.895,7,length=150), x0->lamshell(x0))
Out[41]:
In [42]:
#Plots.plot(x0->APPatanvfinal1P1(x0)-APPatanufinal3P1(x0), x0->APPatanvfinal1P1(x0)+APPatanufinal3P1(x0), range(st,15,length=50), color=:green )
#Plots.plot!(x0->APPatanvfinal1P2(x0)-APPatanufinal3P2(x0), x0->APPatanvfinal1P2(x0)+APPatanufinal3P2(x0), range(st,przec2-1e-7,length=50), color=:red )
#Plots.plot!(x0->APPatanvfinal2P2(x0)-APPatanufinal3P2(x0), x0->APPatanvfinal2P2(x0)+APPatanufinal3P2(x0), range(przec2+1e-7,15,length=50), color=:red )

#Plots.plot!(x0->SHELLv1(x0)-SHELLu3(x0), x0->SHELLv1(x0) + SHELLu3(x0),  x0tab, color=:black, aspectratio=1  )
In [43]:
####### POWIERZCHNIA POCZATKOWA



function atanufinal(lam, x0)
return 1/pi*atan(kap*ufinalin(lam,x0))
end


    function atanufinal2(lam, x0)
    return -1/pi*atan(kap*ufinalin(lam,x0))+1
    end

          function atanufinal3(lam, x0)
            return 1/pi*atan(kap*ufinalin(lam,x0))+2
            end


function atanvfinal(lam, x0)
return 1/pi*atan(kap*vfinalin(lam,x0))
end

    function atanvfinal2(lam, x0)
    return -1/pi*atan(kap*vfinalin(lam,x0))+1
    end

        function atanvfinal3(lam, x0)
        return 1/pi*atan(kap*vfinalin(lam,x0))+2
        end




function test1(x0)
    return lamstar2(x0, 0) -lamstar_zero1
end

infOUTER=find_zero(test1,5)

function test2(x0)
    return lamstar2(x0, 0) -lamstar_zero2
end


infINNER=find_zero(test2,1)






x0ta1 = range(1e-10, infINNER-1e-7,length=150)
x0ta2= range(infINNER+1e-7, infOUTER-1e-7, length=150)
x0ta3=range(infOUTER+1e-7,15, length=150)

x0ta=vcat(x0ta1,x0ta2,x0ta3)

upocz1= atanufinal3.(0, x0ta1)
upocz2= atanufinal2.(0, x0ta2)
upocz3=atanufinal.(0, x0ta3)

UPOCZ = linear_interpolation(x0ta, vcat(upocz1,upocz2,upocz3))


vpocz1 = atanvfinal.(0,x0ta)

VPOCZ = linear_interpolation(x0ta, vpocz1)

Plots.plot( x0->VPOCZ(x0) - UPOCZ(x0), x0-> VPOCZ(x0)+UPOCZ(x0), x0ta )
┌ Warning: At t=29.1483689616043, dt was forced below floating point epsilon 3.552713678800501e-15, and step error estimate = NaN. Aborting. There is either an error in your model specification or the true solution is unstable (or the true solution can not be represented in the precision of Float64).
└ @ SciMLBase C:\Users\mihalbobula\.julia\packages\SciMLBase\oVWPZ\src\integrator_interface.jl:600
┌ Warning: At t=29.148368893283475, dt was forced below floating point epsilon 3.552713678800501e-15, and step error estimate = NaN. Aborting. There is either an error in your model specification or the true solution is unstable (or the true solution can not be represented in the precision of Float64).
└ @ SciMLBase C:\Users\mihalbobula\.julia\packages\SciMLBase\oVWPZ\src\integrator_interface.jl:600
┌ Warning: At t=29.148368899417058, dt was forced below floating point epsilon 3.552713678800501e-15, and step error estimate = NaN. Aborting. There is either an error in your model specification or the true solution is unstable (or the true solution can not be represented in the precision of Float64).
└ @ SciMLBase C:\Users\mihalbobula\.julia\packages\SciMLBase\oVWPZ\src\integrator_interface.jl:600
┌ Warning: At t=29.148369021174226, dt was forced below floating point epsilon 3.552713678800501e-15, and step error estimate = NaN. Aborting. There is either an error in your model specification or the true solution is unstable (or the true solution can not be represented in the precision of Float64).
└ @ SciMLBase C:\Users\mihalbobula\.julia\packages\SciMLBase\oVWPZ\src\integrator_interface.jl:600
Out[43]:
In [44]:
################# TRAJEKTORIA X0=10


Ax0=10
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)

vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)



tab1_A = range(-200,ulamsin1-10e-3,length=50)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 150,length=50)


tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamAa=tablamA


utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)

tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])

vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)

tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])



utrajA=linear_interpolation(tablamA, tabutabA );
vtrajA=linear_interpolation(tablamA, tabvtabA );




########## TRAJEKTORIA X0=5
Ax0=5
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)

vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)



tab1_A = range(-200,ulamsin1-10e-3,length=50)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 150,length=50)


tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamBb=tablamA


utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)

tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])

vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)

tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])



utrajB=linear_interpolation(tablamA, tabutabA );
vtrajB=linear_interpolation(tablamA, tabvtabA );



################## TRAJEKTORIA X0=0


Ax0=1e-6
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)

vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)



tab1_A = range(-200,ulamsin1-10e-3,length=50)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 200,length=50)


tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamCc=tablamA


utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)

tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])

vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)

tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])



utrajC=linear_interpolation(tablamA, tabutabA );
vtrajC=linear_interpolation(tablamA, tabvtabA );
In [45]:
################## TRAJEKTORIA X0=15


Ax0=15
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)

vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)



tab1_A = range(-200,ulamsin1-10e-3,length=150)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 150,length=50)


tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamDd=tablamA


utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)

tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])

vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)

tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])



utrajD=linear_interpolation(tablamA, tabutabA );
vtrajD=linear_interpolation(tablamA, tabvtabA );
In [46]:
################## TRAJEKTORIA X0=11


Ax0=11
ulamsin1=lambda1(sodx0(Ax0) ,lamstar_zero1)
ulamsin2=lambda1(sodx0(Ax0) ,lamstar_zero2)

vlamsin1=lambda1V(sodx0V(Ax0) ,Vlamstar_zero1)
vlamsin2=lambda1V(sodx0V(Ax0) ,Vlamstar_zero2)



tab1_A = range(-200,ulamsin1-10e-3,length=150)
tab2_A = range(ulamsin1+10e-3, ulamsin2-10e-7,length=50)
tab3_A = range(ulamsin2+10e-7, vlamsin1-10e-7,length=50)
tab4_A = range(vlamsin1+10e-7, vlamsin2-10e-3,length=50)
tab5_A = range(vlamsin2+10e-3, 150,length=50)


tablamA=vcat([-10000],tab1_A,tab2_A,tab3_A, tab4_A, tab5_A, [10000]);
tablamEe=tablamA


utab1_A = atanufinal.(tab1_A, Ax0)
utab2_A = atanufinal2.(tab2_A, Ax0)
utab3_A = atanufinal3.(tab3_A, Ax0)
utab4_A = atanufinal3.(tab4_A, Ax0)
utab5_A = atanufinal3.(tab5_A, Ax0)

tabutabA = vcat([-0.5],utab1_A,utab2_A, utab3_A, utab4_A, utab5_A,[2.5])

vtab1_A = atanvfinal.(tab1_A, Ax0)
vtab2_A = atanvfinal.(tab2_A, Ax0)
vtab3_A = atanvfinal.(tab3_A, Ax0)
vtab4_A = atanvfinal2.(tab4_A, Ax0)
vtab5_A = atanvfinal3.(tab5_A, Ax0)

tabvtabA = vcat([-0.5],vtab1_A,vtab2_A, vtab3_A, vtab4_A, vtab5_A,[2.5])



utrajE=linear_interpolation(tablamA, tabutabA );
vtrajE=linear_interpolation(tablamA, tabvtabA );
In [67]:
######### DIAGRAM 






#plotlyjs()
gr()








############# APPARENT DOLNY
lwa=1.4
cap=:magenta

Plots.plot(l->vdolnyA(l)-udolnyA(l),l->vdolnyA(l)+udolnyA(l) , tapA, aspectratio=1, color=cap, label=L"\mathrm{first} \, \mathrm{AH}", lw=lwa )

l1=first(tapA)
l2=first(tapB)

Plots.plot!([vdolnyA(l1)-udolnyA(l1),vdolnyB(l2)-udolnyB(l2) ] ,[vdolnyA(l1)+udolnyA(l1),vdolnyB(l2)+udolnyB(l2)] , aspectratio=1,
    color=cap, label=false, lw=lwa  )

Plots.plot!(l->vdolnyB(l)-udolnyB(l),l->vdolnyB(l)+udolnyB(l) , tapB, aspectratio=1, color=cap, label=false, lw=lwa  )



########## SHELL CROSSING

Plots.plot!(x0->SHELLv1(x0)-SHELLu3(x0), x0->SHELLv1(x0) + SHELLu3(x0),  x0tab, color=:black, 
    label=L"\mathrm{sh.} \, \mathrm{cross.} \, \mathrm{singularities}"  )

#### POW POCZATKOWA

Plots.plot!( x0->VPOCZ(x0) - UPOCZ(x0), x0-> VPOCZ(x0)+UPOCZ(x0), x0ta, color=:black, ls=:dashdot, label=L"\mathrm{initial} \, \mathrm{surface}" )


################### TRAJEKTORIE
lw1=0.6



Plots.plot!( l -> vtrajC(l) - utrajC(l),l -> vtrajC(l) + utrajC(l),tablamCc , aspectratio=1, color=:green, label=L"x_0=0", lw=lw1  )
Plots.plot!( l -> vtrajB(l) - utrajB(l),l -> vtrajB(l) + utrajB(l),tablamBb , aspectratio=1, color=:blue, label=L"x_0=5", lw=lw1  )
Plots.plot!( l -> vtrajA(l) - utrajA(l),l -> vtrajA(l) + utrajA(l), tablamAa, aspectratio=1, color=:red, label=L"x_0=10", lw=lw1  )

Plots.plot!( l -> vtrajE(l) - utrajE(l),l -> vtrajE(l) + utrajE(l),tablamEe , aspectratio=1, color=:orange, 
        linewidth=1, label=L"x_0=11", lw=lw1)

Plots.plot!( l -> vtrajD(l) - utrajD(l),l -> vtrajD(l) + utrajD(l),tablamDd , aspectratio=1, color=:brown, 
        linewidth=1, label=L"x_0=15", lw=lw1)
Out[67]:
In [68]:
########## ATRYBUTY


Plots.plot!(xlabel=L"\tilde{v} - \tilde{u}",
    ylabel=L"\tilde{v} + \tilde{u}")
Plots.plot!(xlims=(-3.25,3.5), ylims=(-1.25,5.15), grid=false, xticks=-3:4:1, yticks=-1:6:5, legendfontsize=6,
xtickfontsize=6,ytickfontsize=6, xguidefontsize=10,yguidefontsize=10 )




lens!([-2, -1.5], [1.55, 2.05];  inset=(1, bbox(0.51, 0.5,0.2, 0.2)), 
       subplot=2, ticks=false, framestyle=:box, ls=:dash, lw=0.5 , lc=:grey, aspectratio=1)
Out[68]:
In [69]:
Plots.savefig("diagNONHOMOu75v15.svg")
Out[69]:
"C:\\Users\\mihalbobula\\Desktop\\ew_final_przec\\diagNONHOMOu75v15.svg"
In [70]:
############# NUMERYCZNIE 
using DifferentialEquations


#x01=5
lfin=deninf(5)+0.474






function deltaNUM(l1,x0)


    

function rowdelta(du, u, p, l)
du[1]=-2*sin(2*beta(l, Beta0(x0)))*u[1]-x(l, x0)*cos(2*beta(l, Beta0(x0)))*u[1]^2
end
u0=[delta0(x0)]
lspan=(0,20 )



condition(u,t,integrator) = u[1] - 1e9 # Is zero when u[3] = 10
affect!(integrator) = terminate!(integrator)
cb = ContinuousCallback(condition,affect!)    
    

prob=ODEProblem(rowdelta,u0, lspan,callback = cb, reltol=1e-7,abstol=1e-7 )
sol1=solve(prob)

return sol1(l1)[1]
end


function lamshell(x0)

function test(l1)
return deltaNUM(l1,x0)-1e8
end

return find_zero(test,(0,100) )[1]
end

#deltaNUM(10,5)



#lamshell(24.5)

@time Plots.plot( range(5,20,length=150), x0->lamshell(x0) )
UndefVarError: `deninf` not defined

Stacktrace:
 [1] top-level scope
   @ In[70]:6